Шаг 10 - Добавляет созданную тему в вид.

Автор Каев А. Г.

После создания файлов темы, ее можно добавить в вид.

theView = av.FindDoc("View1")
tbl = FTab.MakeNew("c:\test.shp".AsFileName, point)
theTheme = FTheme.Make(tbl)
theView.AddTheme(theTheme)

Смотрим результат.

10_1.gif

Все получилось. Добавилось всего две строки, создать саму тему на основе объекта Ftab и добавить ее в вид. Что будет если скрипт запустить несколько раз? Да просто несколько раз тема добавиться.

10_2.gif

Hosted by uCoz